//copyright (c) 2016 L.W.C<lwc@li.cm>

#include "NCstack.h"

valist* push(valist *ls,value v){
	valist *new;
	new=(valist*)vxin_malloc(sizeof(valist));
	new->next=ls;
	new->v=v;
	return new;
}

valist* pop(valist *ls,value *v){
	valist *old;
	if(!ls->next)return ls;
	old=ls->next;
	if(v)*v=ls->v;
	vxin_free(ls);
	return old;
}